home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / S-Sh / SD Gradebook.cpt / SuperDuper Gradebook 1.25 / card_3071.txt < prev    next >
Text File  |  1988-07-21  |  30KB  |  937 lines

  1. -- card: 3071 from stack: in.25
  2. -- bmap block id: 5236
  3. -- flags: 4000
  4. -- background id: 2780
  5. -- name: Front
  6. ----- HyperTalk script -----
  7.  
  8. on closecard
  9.   set the cursor to 4
  10.   if visible of card button "make copy" then hide card button "make copy"
  11.   if visible of card field "first info" then hide card field "first info"
  12.   if visible of card field "second info" then hide card field "second info"
  13.   if visible of card button "make text file" then hide card button "make text file"
  14.   if visible of card field ID 20 then hide card field ID 20
  15.   repeat with count = 21 to 23
  16.     hide card button id count
  17.   end repeat
  18.   if visible of card button "I‚Äôll do that" then hide card button "I‚Äôll do that"
  19.   if visible of card button "What‚Äôs ‚ÄúShareware‚Äù?" then hide card button "What‚Äôs ‚ÄúShareware‚Äù?"
  20.   if visible of card field "shareware" then hide card field "shareware"
  21.   if visible of card button "what a wonderful idea" then hide card button "what a wonderful idea"
  22.   if visible of card field "explanation" then hide card field "explanation"
  23. end closecard
  24.  
  25.  
  26. -- part 1 (field)
  27. -- low flags: 01
  28. -- high flags: 0000
  29. -- rect: left=171 top=121 right=144 bottom=434
  30. -- title width / last selected line: 0
  31. -- icon id / first selected line: 0 / 0
  32. -- text alignment: 1
  33. -- font id: 2
  34. -- text size: 14
  35. -- style flags: 256
  36. -- line height: 18
  37. -- part name: coursename
  38.  
  39.  
  40. -- part 2 (button)
  41. -- low flags: 00
  42. -- high flags: A000
  43. -- rect: left=32 top=272 right=315 bottom=125
  44. -- title width / last selected line: 0
  45. -- icon id / first selected line: 11645 / 11645
  46. -- text alignment: 1
  47. -- font id: 0
  48. -- text size: 12
  49. -- style flags: 0
  50. -- line height: 16
  51. -- part name: Create a Gradebook
  52. ----- HyperTalk script -----
  53. on mouseUp
  54.   set the lockscreen to true
  55.   show card field "first info"
  56.   show card button "make copy"
  57. end mouseUp
  58.  
  59.  
  60.  
  61. -- part 3 (field)
  62. -- low flags: 81
  63. -- high flags: 2004
  64. -- rect: left=167 top=66 right=267 bottom=437
  65. -- title width / last selected line: 0
  66. -- icon id / first selected line: 0 / 0
  67. -- text alignment: 0
  68. -- font id: 3
  69. -- text size: 9
  70. -- style flags: 0
  71. -- line height: 12
  72. -- part name: first info
  73. ----- HyperTalk script -----
  74. on mouseup
  75.   set the lockscreen to true
  76.   hide card button "make copy"
  77.   hide card field "first info"
  78.   set the lockscreen to false
  79. end mouseup
  80.  
  81.  
  82.  
  83. -- part 4 (button)
  84. -- low flags: 80
  85. -- high flags: 2002
  86. -- rect: left=387 top=213 right=257 bottom=426
  87. -- title width / last selected line: 65535
  88. -- icon id / first selected line: -15634 / 49902
  89. -- text alignment: 1
  90. -- font id: 0
  91. -- text size: 12
  92. -- style flags: 0
  93. -- line height: 16
  94. -- part name: make copy
  95. ----- HyperTalk script -----
  96.  
  97. on mouseUp
  98.   global source,dest,shortDestName,duping,Gradebookname
  99.   set the lockscreen to true
  100.   hide card button "make copy"
  101.   hide card field "first info"
  102.   show card button "Instructions"
  103.   set the lockscreen to false
  104.   get the long name of this stack
  105.   put it into stackname
  106.   put word 2 of stackname into source
  107.   ask "Enter name for new file" with "My Course, This Term"
  108.   if it is not empty then
  109.     put it into shortDestName
  110.     show card field "message"
  111.   else
  112.     exit mouseup
  113.   end if
  114.   put trimquotes(source) into thisStringName
  115.   put clipoff (thisStringName) into pathName
  116.   put pathName&shortDestName into dest
  117.   CopyFile trimquotes(source),dest
  118.   put the result into errorCode
  119.   if errorCode <> 0 then hide card field "message"
  120.   if errorCode = -2 then
  121.     Answer "Syntax error; operation failed." with "OK"
  122.   else if errorCode = -1 then
  123.     answer "Not enough memory to copy; operation failed." with "OK"
  124.   else if errorCode = 0 then
  125.     set the lockscreen to true
  126.     hide card field "message"
  127.     put true into duping
  128.     go to stack shortDestName
  129.     put false into duping
  130.     go card 1
  131.     set the name of card button ID 21 of card 1 to shortDestName
  132.     beep 3
  133.     set the lockscreen to false
  134.     exit mouseup
  135.   else if errorCode = 1 then
  136.     answer "Can't find source file; operation failed" with "OK"
  137.   else if errorCode = 2 then
  138.     answer "Cannot create destination file; operation failed." with "OK"
  139.   else if errorCode = 3 then
  140.     answer "Destination file already exists. Overwrite it?" with "Yes" or "no" or "Cancel"
  141.     if it is "Cancel" then
  142.       exit mouseup
  143.     else if it is "No" then
  144.       answer "Try again, but assign a different name." with "OK"
  145.     else
  146.       show card field "message"
  147.       overWrite
  148.     end if
  149.   else if errorCode = 4 then
  150.     answer "Had trouble reading source file. Operation failed." with "OK"
  151.   else if errorCode = 5 then
  152.     answer "Had trouble writing output file. Operation failed." with "OK"
  153.   else
  154.     set the lockscreen to true
  155.     hide card field "message"
  156.     put true into duping --we're duplicating the original stack
  157.     go to stack shortDestName
  158.     put false into duping
  159.     go card 1
  160.     set the name of card button ID 21 of card 1 to shortDestName
  161.     beep 3
  162.     set the lockscreen to false
  163.     exit mouseup
  164.   end if
  165. end mouseUp
  166.  
  167. function trimquotes instring
  168. get the length of instring
  169. put it into stringlength
  170. repeat with count = 2 to stringlength-1
  171.   put char count of instring after stringhold
  172. end repeat
  173. return stringhold
  174. end trimquotes
  175.  
  176. function clipoff instring
  177. get the length of instring
  178. put it into stringlength
  179. put 0 into charpointer
  180. repeat with count = stringlength down to 1
  181.   put charpointer+1 into charpointer
  182.   if char count of instring = ":" then exit repeat
  183. end repeat
  184. put stringlength - (charpointer - 1) into stringlength
  185. repeat with count = 1 to stringlength
  186.   put char count of instring after theString
  187. end repeat
  188. return theString
  189. end clipoff
  190.  
  191. on overWrite
  192.   global source,dest,shortDestName,duping,Gradebookname
  193.   CopyFile trimquotes(source),dest,o
  194.   put the result into errorCode
  195.   if errorCode <> 0 then
  196.     hide card field "message"
  197.   end if
  198.   if errorCode = -2 then
  199.     Answer "Syntax error; operation failed." with "OK"
  200.   else if errorCode = -1 then
  201.     answer "Not enough memory to copy; operation failed." with "OK"
  202.   else if errorCode = 0 then
  203.     set the lockscreen to true
  204.     hide card field "message"
  205.     put true into duping
  206.     go to stack shortDestName
  207.     put false into duping
  208.     go card 1
  209.     set the name of card button ID 21 of card 1 to shortDestName
  210.     set the lockscreen to false
  211.     exit overWrite
  212.   else if errorCode = 1 then
  213.     answer "Can't find source file; operation failed" with "OK"
  214.   else if errorCode = 2 then
  215.     answer "Cannot create destination file; operation failed." with "OK"
  216.   else if errorCode = 3 then
  217.     answer "Overwrite failed." with "OK"
  218.   else if errorCode = 4 then
  219.     answer "Had trouble reading source file. Operation failed." with "OK"
  220.   else if errorCode = 5 then
  221.     answer "Had trouble writing output file. Operation failed." with "OK"
  222.   else
  223.     set the lockscreen to true
  224.     hide card field "message"
  225.     go to stack shortDestName
  226.     put true into duping
  227.     put false into duping
  228.     go card 1
  229.     set the name of card button ID 21 of card 1 to shortDestName
  230.     beep 3
  231.     set the lockscreen to false
  232.     exit overWrite
  233.   end if
  234. end overWrite
  235.  
  236.  
  237.  
  238.  
  239. -- part 6 (button)
  240. -- low flags: 00
  241. -- high flags: A003
  242. -- rect: left=27 top=217 right=239 bottom=127
  243. -- title width / last selected line: 0
  244. -- icon id / first selected line: 0 / 0
  245. -- text alignment: 1
  246. -- font id: 0
  247. -- text size: 12
  248. -- style flags: 0
  249. -- line height: 16
  250. -- part name: instructions
  251. ----- HyperTalk script -----
  252. on mouseUp
  253.   if visible of card field id 20 then
  254.     hide card field id 20
  255.     repeat with count = 21 to 23
  256.       hide card button id count
  257.     end repeat
  258.   end if
  259.  
  260.   if visible of card field "second info" then
  261.     hide card field "second info"
  262.     hide card button "Make Text File"
  263.   else
  264.     set the scroll of card field "second info" to 0
  265.     show card field "second info"
  266.     show card button "Make Text File"
  267.   end if
  268. end mouseUp
  269.  
  270.  
  271.  
  272. -- part 7 (field)
  273. -- low flags: 81
  274. -- high flags: 2007
  275. -- rect: left=164 top=34 right=274 bottom=439
  276. -- title width / last selected line: 0
  277. -- icon id / first selected line: 0 / 0
  278. -- text alignment: 0
  279. -- font id: 3
  280. -- text size: 9
  281. -- style flags: 0
  282. -- line height: 12
  283. -- part name: second info
  284. ----- HyperTalk script -----
  285. on mouseup
  286.   hide card field "second info"
  287.   hide card button "Make Text File"
  288. end mouseup
  289.  
  290.  
  291.  
  292. -- part 9 (button)
  293. -- low flags: 00
  294. -- high flags: A002
  295. -- rect: left=25 top=87 right=105 bottom=92
  296. -- title width / last selected line: 0
  297. -- icon id / first selected line: 0 / 0
  298. -- text alignment: 1
  299. -- font id: 3
  300. -- text size: 9
  301. -- style flags: 256
  302. -- line height: 12
  303. -- part name: to Records
  304. ----- HyperTalk script -----
  305. on mouseUp
  306.   visual effect iris close to black
  307.   visual effect iris open
  308.   go card "first record"
  309.   beep
  310. end mouseUp
  311.  
  312.  
  313.  
  314. -- part 11 (button)
  315. -- low flags: 00
  316. -- high flags: A002
  317. -- rect: left=63 top=26 right=42 bottom=130
  318. -- title width / last selected line: 0
  319. -- icon id / first selected line: 0 / 0
  320. -- text alignment: 1
  321. -- font id: 3
  322. -- text size: 9
  323. -- style flags: 0
  324. -- line height: 12
  325. -- part name: Options
  326. ----- HyperTalk script -----
  327. on mouseUp
  328.   visual effect dissolve
  329.   go card "Options"
  330.   beep
  331. end mouseUp
  332.  
  333.  
  334.  
  335. -- part 12 (button)
  336. -- low flags: 00
  337. -- high flags: A002
  338. -- rect: left=50 top=46 right=62 bottom=118
  339. -- title width / last selected line: 0
  340. -- icon id / first selected line: 0 / 0
  341. -- text alignment: 1
  342. -- font id: 3
  343. -- text size: 9
  344. -- style flags: 0
  345. -- line height: 12
  346. -- part name: Preferences
  347. ----- HyperTalk script -----
  348. on mouseUp
  349.   visual effect dissolve
  350.   go card "Preferences"
  351.   beep
  352. end mouseUp
  353.  
  354.  
  355.  
  356. -- part 13 (button)
  357. -- low flags: 00
  358. -- high flags: A002
  359. -- rect: left=37 top=66 right=82 bottom=105
  360. -- title width / last selected line: 0
  361. -- icon id / first selected line: 0 / 0
  362. -- text alignment: 1
  363. -- font id: 3
  364. -- text size: 9
  365. -- style flags: 0
  366. -- line height: 12
  367. -- part name: Manager
  368. ----- HyperTalk script -----
  369. on mouseUp
  370.   visual effect dissolve
  371.   go card "Gradebook Manager"
  372.   beep
  373. end mouseUp
  374.  
  375.  
  376.  
  377. -- part 14 (button)
  378. -- low flags: 00
  379. -- high flags: 2000
  380. -- rect: left=423 top=281 right=304 bottom=450
  381. -- title width / last selected line: 0
  382. -- icon id / first selected line: 21700 / 21700
  383. -- text alignment: 1
  384. -- font id: 0
  385. -- text size: 12
  386. -- style flags: 0
  387. -- line height: 16
  388. -- part name: home
  389. ----- HyperTalk script -----
  390. on mouseUp
  391.   set the cursor to 4
  392.   go home
  393. end mouseUp
  394.  
  395.  
  396.  
  397. -- part 15 (button)
  398. -- low flags: 00
  399. -- high flags: 2000
  400. -- rect: left=153 top=269 right=303 bottom=189
  401. -- title width / last selected line: 0
  402. -- icon id / first selected line: 26003 / 26003
  403. -- text alignment: 1
  404. -- font id: 0
  405. -- text size: 12
  406. -- style flags: 0
  407. -- line height: 16
  408. -- part name: Quit
  409. ----- HyperTalk script -----
  410. on mouseUp
  411.   answer "Bail out of Hypercard?" with "Yes, please" or "Not yet"
  412.   if it is "Yes, please" then
  413.     set the cursor to 4
  414.     domenu "Quit Hypercard"
  415.   end if
  416. end mouseUp
  417.  
  418.  
  419.  
  420. -- part 16 (button)
  421. -- low flags: 00
  422. -- high flags: A003
  423. -- rect: left=40 top=137 right=189 bottom=115
  424. -- title width / last selected line: 0
  425. -- icon id / first selected line: 27478 / 27478
  426. -- text alignment: 1
  427. -- font id: 0
  428. -- text size: 12
  429. -- style flags: 0
  430. -- line height: 16
  431. -- part name: Open A Stack
  432. ----- HyperTalk script -----
  433. on mouseUp
  434.   domenu Open Stack...
  435. end mouseUp
  436.  
  437.  
  438.  
  439. -- part 17 (field)
  440. -- low flags: 01
  441. -- high flags: 0001
  442. -- rect: left=192 top=282 right=297 bottom=415
  443. -- title width / last selected line: 0
  444. -- icon id / first selected line: 0 / 0
  445. -- text alignment: 0
  446. -- font id: 18
  447. -- text size: 10
  448. -- style flags: 0
  449. -- line height: 13
  450. -- part name: copyright
  451.  
  452.  
  453. -- part 19 (button)
  454. -- low flags: 80
  455. -- high flags: A004
  456. -- rect: left=26 top=241 right=263 bottom=126
  457. -- title width / last selected line: 0
  458. -- icon id / first selected line: 0 / 0
  459. -- text alignment: 1
  460. -- font id: 3
  461. -- text size: 9
  462. -- style flags: 256
  463. -- line height: 12
  464. -- part name: Make Text File
  465. ----- HyperTalk script -----
  466. on mouseUp
  467.   open file "Gradebook Instructions"
  468.   write card field "second info" to file "Gradebook Instructions"
  469.   close file "Gradebook Instructions"
  470.   beep
  471. end mouseUp
  472.  
  473.  
  474.  
  475. -- part 20 (field)
  476. -- low flags: 81
  477. -- high flags: 0004
  478. -- rect: left=183 top=53 right=237 bottom=398
  479. -- title width / last selected line: 0
  480. -- icon id / first selected line: 0 / 0
  481. -- text alignment: 1
  482. -- font id: 3
  483. -- text size: 9
  484. -- style flags: 256
  485. -- line height: 12
  486. -- part name: Show Home
  487. ----- HyperTalk script -----
  488. on mouseup
  489.   set the lockscreen to true
  490.   hide card button ID 21
  491.   hide card field "show home"
  492.   hide card button "Put Button into Home Stack"
  493.   hide card button "Copy Button to Clipboard"
  494.   set the lockscreen to false
  495. end mouseup
  496.  
  497.  
  498.  
  499.  
  500. -- part 21 (button)
  501. -- low flags: 80
  502. -- high flags: A003
  503. -- rect: left=221 top=118 right=167 bottom=366
  504. -- title width / last selected line: 0
  505. -- icon id / first selected line: 32756 / 32756
  506. -- text alignment: 1
  507. -- font id: 0
  508. -- text size: 12
  509. -- style flags: 0
  510. -- line height: 16
  511. -- part name: Original Clean Gradebook
  512. ----- HyperTalk script -----
  513. on mouseUp
  514.   hide menubar
  515.   visual effect iris open
  516.   go to first card of stack "Original Clean Gradebook"
  517. end mouseUp
  518.  
  519.  
  520. -- part 22 (button)
  521. -- low flags: 80
  522. -- high flags: A006
  523. -- rect: left=189 top=171 right=193 bottom=395
  524. -- title width / last selected line: 0
  525. -- icon id / first selected line: 0 / 0
  526. -- text alignment: 1
  527. -- font id: 0
  528. -- text size: 12
  529. -- style flags: 0
  530. -- line height: 16
  531. -- part name: Put Button Into Home Stack
  532. ----- HyperTalk script -----
  533. on mouseUp
  534.   --reset name of button to match stack
  535.   get the short name of this stack
  536.   put it into stackname
  537.   set the name of card button ID 21 to stackname
  538.   --reset script of button to match name of stack
  539.   put "on mouseUp"& return into scriptmaker
  540.   put "hide menubar"& return after scriptmaker
  541.   put "visual effect iris open"& return after scriptmaker
  542.   put "go to first card of stack "after scriptmaker
  543.   put quote & stackname & quote & return after scriptmaker
  544.   put "end mouseUp" after scriptmaker
  545.   set the script of card button ID 21 to scriptmaker
  546.   set lockscreen to true
  547.   set the style of card button id 21 to "transparent"
  548.   choose button tool
  549.   get the loc of card button ID 21
  550.   click at it
  551.   doMenu "Copy Button"
  552.   set the style of card button id 21 to "round rect"
  553.   push card
  554.   go home
  555.   doMenu "Paste Button"
  556.   choose browse tool
  557.   pop card
  558.   set lockscreen to false
  559.   set hilite of card button "Put Button Into Home Stack" to false
  560.   beep 2
  561. end mouseUp
  562.  
  563.  
  564.  
  565. -- part 23 (button)
  566. -- low flags: 80
  567. -- high flags: A006
  568. -- rect: left=190 top=196 right=217 bottom=389
  569. -- title width / last selected line: 0
  570. -- icon id / first selected line: 0 / 0
  571. -- text alignment: 1
  572. -- font id: 0
  573. -- text size: 12
  574. -- style flags: 0
  575. -- line height: 16
  576. -- part name: Copy Button To Clipboard
  577. ----- HyperTalk script -----
  578. on mouseUp
  579.   --reset name of button to match stack
  580.   get the short name of this stack
  581.   put it into stackname
  582.   set the name of card button ID 21 to stackname
  583.   --reset script of button to match name of stack
  584.   put "on mouseUp"& return into scriptmaker
  585.   put "hide menubar"& return after scriptmaker
  586.   put "visual effect iris open"& return after scriptmaker
  587.   put "go to first card of stack "after scriptmaker
  588.   put quote & stackname & quote & return after scriptmaker
  589.   put "end mouseUp" after scriptmaker
  590.   set the script of card button ID 21 to scriptmaker
  591.   set the lockscreen to true
  592.   set the style of card button id 21 to "transparent"
  593.   choose button tool
  594.   get the loc of card button ID 21
  595.   click at it
  596.   doMenu "Copy Button"
  597.   set the style of card button id 21 to "round rect"
  598.   set hilite of card button "Copy Button to Clipboard" to false
  599.   choose browse tool
  600.   set the lockscreen to false
  601.   beep 2
  602. end mouseUp
  603.  
  604.  
  605.  
  606. -- part 24 (button)
  607. -- low flags: 00
  608. -- high flags: 2000
  609. -- rect: left=468 top=28 right=47 bottom=489
  610. -- title width / last selected line: 0
  611. -- icon id / first selected line: 1015 / 1015
  612. -- text alignment: 1
  613. -- font id: 0
  614. -- text size: 12
  615. -- style flags: 0
  616. -- line height: 16
  617. -- part name: getButton
  618. ----- HyperTalk script -----
  619. on mouseUp
  620.   if visible of card field "second info" then hide card field "second info"
  621.   if visible of card button "Make Text File" then hide card button "Make Text File"
  622.   if the visible of card field "Show Home" is false then
  623.     set the lockscreen to true
  624.     show card field "Show Home"
  625.     show card button ID 21
  626.     show card button "Put Button Into Home Stack"
  627.     show card button "Copy Button to Clipboard"
  628.     set the lockscreen to false
  629.   else
  630.     set the lockscreen to true
  631.     hide card button ID 21
  632.     hide card field "show home"
  633.     hide card button "Put Button into Home Stack"
  634.     hide card button "Copy Button to Clipboard"
  635.     set the lockscreen to false
  636.   end if
  637. end mouseUp
  638.  
  639.  
  640.  
  641. -- part 26 (field)
  642. -- low flags: 81
  643. -- high flags: 0004
  644. -- rect: left=21 top=23 right=200 bottom=139
  645. -- title width / last selected line: 0
  646. -- icon id / first selected line: 0 / 0
  647. -- text alignment: 1
  648. -- font id: 3
  649. -- text size: 12
  650. -- style flags: 256
  651. -- line height: 16
  652. -- part name: message
  653. ----- HyperTalk script -----
  654. on mouseUp
  655.   hide card field "message"
  656. end mouseUp
  657.  
  658.  
  659.  
  660. -- part 30 (button)
  661. -- low flags: 00
  662. -- high flags: A000
  663. -- rect: left=468 top=267 right=316 bottom=487
  664. -- title width / last selected line: 0
  665. -- icon id / first selected line: 1015 / 1015
  666. -- text alignment: 1
  667. -- font id: 0
  668. -- text size: 12
  669. -- style flags: 0
  670. -- line height: 16
  671. -- part name: ?
  672. ----- HyperTalk script -----
  673. on mouseUp
  674.   set the lockscreen to true
  675.   show card button "I‚Äôll Do That"
  676.   show card button "What‚Äôs ‚ÄúShareware‚Äù?"
  677.   show card field "shareware"
  678.   set the lockscreen to false
  679. end mouseUp
  680.  
  681.  
  682.  
  683. -- part 27 (field)
  684. -- low flags: 81
  685. -- high flags: 2004
  686. -- rect: left=24 top=23 right=318 bottom=489
  687. -- title width / last selected line: 0
  688. -- icon id / first selected line: 0 / 0
  689. -- text alignment: 1
  690. -- font id: 0
  691. -- text size: 12
  692. -- style flags: 0
  693. -- line height: 16
  694. -- part name: shareware
  695.  
  696.  
  697. -- part 28 (button)
  698. -- low flags: 80
  699. -- high flags: A003
  700. -- rect: left=208 top=287 right=309 bottom=308
  701. -- title width / last selected line: 0
  702. -- icon id / first selected line: 0 / 0
  703. -- text alignment: 1
  704. -- font id: 0
  705. -- text size: 12
  706. -- style flags: 0
  707. -- line height: 16
  708. -- part name: I’ll Do That
  709. ----- HyperTalk script -----
  710. on mouseUp
  711.   answer "Promise?" with "Yes"
  712.   answer "Thank you."
  713.   set the lockscreen to true
  714.   hide card button "I‚Äôll Do That"
  715.   hide card button "What‚Äôs ‚ÄúShareware‚Äù?"
  716.   hide card field "shareware"
  717.   set the lockscreen to false
  718. end mouseUp
  719.  
  720.  
  721.  
  722. -- part 29 (button)
  723. -- low flags: 80
  724. -- high flags: A004
  725. -- rect: left=33 top=288 right=310 bottom=133
  726. -- title width / last selected line: 0
  727. -- icon id / first selected line: 0 / 0
  728. -- text alignment: 1
  729. -- font id: 18
  730. -- text size: 10
  731. -- style flags: 0
  732. -- line height: 13
  733. -- part name: What’s “Shareware”?
  734. ----- HyperTalk script -----
  735. on mouseUp
  736.   set the lockscreen to true
  737.   show card field "explanation"
  738.   show card button "what a wonderful idea"
  739.   set the lockscreen to false
  740. end mouseUp
  741.  
  742.  
  743.  
  744. -- part 31 (field)
  745. -- low flags: 81
  746. -- high flags: 2002
  747. -- rect: left=25 top=24 right=315 bottom=486
  748. -- title width / last selected line: 0
  749. -- icon id / first selected line: 0 / 0
  750. -- text alignment: 1
  751. -- font id: 3
  752. -- text size: 9
  753. -- style flags: 256
  754. -- line height: 12
  755. -- part name: explanation
  756.  
  757.  
  758. -- part 32 (button)
  759. -- low flags: 80
  760. -- high flags: A003
  761. -- rect: left=169 top=320 right=342 bottom=338
  762. -- title width / last selected line: 0
  763. -- icon id / first selected line: 0 / 0
  764. -- text alignment: 1
  765. -- font id: 0
  766. -- text size: 12
  767. -- style flags: 0
  768. -- line height: 16
  769. -- part name: what a wonderful idea
  770. ----- HyperTalk script -----
  771. on mouseUp
  772.   set the lockscreen to true
  773.   hide card field "explanation"
  774.   hide card button "what a wonderful idea"
  775.   set the lockscreen to false
  776. end mouseUp
  777.  
  778.  
  779.  
  780. -- part contents for card part 1
  781. ----- text -----
  782. SuperDuper Gradebook 1.25
  783.  
  784. -- part contents for card part 3
  785. ----- text -----
  786.  
  787.  
  788. The "Copy" button below will create an exact duplicate of the current stack, and put you into it.
  789.  
  790. The best way to use SuperDuper Gradebook is to keep the original stack clean, and work only with copies of it.  It is much easier to start with a clean copy than to clean one up for re-use.  Make a copy for each class you want a gradebook for.  Name them for the course and term, e.g. "English 101, Spring 1988".
  791.  
  792. If you do not wish to create a copy now, 
  793. click in this window to make it go away.
  794.  
  795. -- part contents for card part 7
  796. ----- text -----
  797.                     SUPERDUPER GRADEBOOK
  798.                      version 1.25, July 1988 
  799.  
  800. IMPORTANT:  If this is the original SuperDuper Gradebook stack, close this window right now and click the "Create a Gradebook" button.  That will make a copy of this stack, and put you into it.  Keep the original clean, for making copies of. It's easier than cleaning up a gradebook for re-use.  Hint: it's a good idea to name your "working" Gradebook stacks with the name & term of the course, e.g. "English 101, Spring '88".
  801.                 *******************
  802. OK, now we're working on a copy of the original, right?
  803.  
  804. The first thing to do is to tailor this gradebook to your needs, by going to the Gradebook Manager card.  The "Manager" button will take you there.  Check the Help file there for further instructions on setting up your gradebook.
  805.  
  806. But first, READ THESE INSTRUCTIONS ALL THE WAY THROUGH BEFORE PROCEEDING TO SET UP YOUR GRADEBOOK.
  807.  
  808.  
  809.         IF YOU WOULD LIKE A DISK FILE OF THESE
  810.         INSTRUCTIONS, SO YOU CAN PRINT THEM 
  811.         OUT WITH A  WORD PROCESSOR OR TEXT 
  812.         EDITOR, CLICK THE BUTTON "Make Text File"
  813.  
  814.  
  815.                 *******************
  816.  
  817.             GENERAL OPERATING INSTRUCTIONS
  818.  
  819. INSTALLING BUTTON IN HOME STACK:
  820. Click on the little round button at upper right to open a window allowing you to install a Gradebook button in your Home stack.  You can have different buttons for each differently-named Gradebook. (The installer automatically picks up on the name of the current Gradebook stack.)
  821.  
  822.  
  823. STUDENT RECORDS SECTION:
  824. The main section of this stack is the Records section, which contains a record card for each student.  You enter the primary data on the cards (name & student number, and such things as test scores) and the Gradebook  computes averages and assigns grades, using parameters you have entered earlier.  The gradebook recognizes four different categories of student work (minor assignments, exams, papers, and Final Exam), but does not expect or require you to use all four of them.  Each student record card has room for 14 minor assignments, 4 exams, 3 papers, and 1 Final Exam.  At the end of the term, the Gradebook assigns a Term Grade.
  825.  
  826. ENTERING USER PARAMETERS:
  827. User Parameters are entered in two places: the Options card and the Preferences card.  
  828.  
  829. The Options card is where you make the following choices: for each category of work, whether to compute letter-grades based on entered scores, or to compute "scores" based on entered letter-grades; how many items in each category to "drop" before computing average grades (some teachers like to drop the lowest one or two or three scores); and what weight each category of work will carry toward the Term Grade.
  830.  
  831. The Preferences card is where you enter breakpoints for assigning letter grades based on scores.
  832.  
  833. The Gradebook "remembers" User Parameters from one session to the next.  You do not have to re-enter them every time.  If you want to change them, you are free to do so whenever you like.
  834.  
  835. COMPUTING GRADES:
  836. Grades (or scores) are not computed until the appropriate button is clicked: see the Help file in the Records section for details.  If you make a change in your user parameters, those changes won't be reflected until you re-compute the grades by clicking the buttons again.
  837.  
  838. If your user parameters don't seem to work properly, it is probably because you forgot to "set" them after entering them.  Most of the parameters require you to click a button after entering numbers; if you forget to click the button, the numbers won't "take".
  839.  
  840. Each student record card contains buttons for computing grades for that student.  In addition, the Manager card contains buttons that compute grades for all students.  The most efficient procedure is to enter scores on individual cards, then go to the Manager to compute grades with a single button-click.
  841.  
  842. In addition to the standard record-keeping and grade assigning capabilities, SuperDuper Gradebook contains several other goodies.  
  843.  
  844. CLASS AVERAGES & GRADE DISTRIBUTIONS:
  845. It will compute class averages for scores/grades in all categories, and will show the grade distribution in whole numbers and percentages, and as a bar graph.
  846.  
  847. COLUMNAR DISPLAY:
  848. For certain purposes, such as quick visual comparison, a row-and-column display is superior to the regular one-card-at-a-time display.  The Gradebook lets you assemble a row-and-column display containing student names and up to 7 data columns, which you can then scroll through. (The 7 column limit is because of the fixed size of the Hypercard window.)  With really large classes (several hundred students) this feature may not work properly, since Hypercard will not allow more than 32K of data in an individual text field.
  849.  
  850. TABBED TEXT FILES:
  851. For more detailed row-and-column treatment, you can export any selection of data you like (including ALL data) into a tabbed Text file on disk.  The text file can then be imported into any standard spreadsheet program, such as Excel, for manipulation, editing, printing, etc.
  852.  
  853. ARCHIVING GRADEBOOK DATA:
  854. The standard way to archive class grades with SuperDuper Gradebook is to stash the Gradebook stacks on a storage floppy.  But there is a more economical way, which loses you some flexibility.
  855. At the end of the term, when it is unlikely that you will be making further changes in the Gradebook, you can do a full dump of all data into a Text file, as described above.  Then copy the Text file onto a storage floppy.  The difference is a saving of about 200K of disk space, per class.
  856.  
  857. SAVING A HARD COPY OF GRADEBOOK DATA:
  858. Even if you prefer to archive the entire stack, it is recommended that you do a full data dump and then print a hard copy of the Text file, using your favorite spreadsheet program.  A paper copy of the data can be very important later on.  After it is printed, you can delete the Text file from your disk.  Alternatively, you can print out the Record cards from the Gradebook, using a button in the Manager card. 
  859.  
  860. AUTO-COMPACTION FEATURE:
  861. As Hypercard stacks are modified, they tend to accumulate wasted "free" space on disk.  This wasted space is eliminated by Compacting the stack.  The Gradebook stack contains an automatic compaction feature: if it has accumulated 15K or more of free space, a dialog will ask whether you wish to compact the stack.  Click whichever button you like.  In order to compact a Hypercard stack, you must have an amount of available room on the disk equal to the current size of the stack.
  862.  
  863.  
  864.         IF YOU WOULD LIKE A DISK FILE OF THESE
  865.         INSTRUCTIONS, SO YOU CAN PRINT THEM 
  866.         OUT WITH A  WORD PROCESSOR OR TEXT 
  867.         EDITOR, CLICK THE BUTTON "Make Text File"
  868.  
  869.        
  870.                   comments or suggestions to:
  871.                           Bangs L. Tapscott
  872.                           4608 Lanark Road
  873.                     Salt Lake City, UT 84124
  874.                        GEnie address: PLATO
  875.         
  876.                         for Shareware info, 
  877.            click the round button at lower right.
  878. -------------------------------------------------
  879.            NOTE TO HYPERCARD "POWER USERS":
  880. All intended functions of this stack are fully automated.  You'll never need to use any HyperCard commands (e.g. thru the menubar or message box or command keys).  If you go ahead and use them anyway, there‚Äôs a good chance you‚Äôll break something.  You bin warned.
  881. -------------------------------------------------
  882.  
  883.          [click in this window to make it go away]
  884.  
  885.  
  886.  
  887. -- part contents for card part 17
  888. ----- text -----
  889. copyright ¬© 1988 Bangs L. Tapscott.  All Rights Reserved.
  890.  
  891. -- part contents for card part 20
  892. ----- text -----
  893.  
  894. Install This Button In
  895. Your Home Stack
  896. for Quick Access to
  897. Your Gradebook
  898.  
  899. -- part contents for card part 26
  900. ----- text -----
  901.  
  902.  
  903.  
  904. RELAX...
  905. THIS WILL
  906. TAKE
  907. SEVERAL
  908. MINUTES
  909.  
  910. -- part contents for card part 27
  911. ----- text -----
  912. shareware notice
  913. •••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
  914. SUPERDUPER GRADEBOOK
  915. version 1.25
  916. Copyright ¬© 1988 Bangs L. Tapscott
  917. All Rights Reserved
  918. This program may not be sold or circulated commercially
  919. without explicit permission of the author.  User Groups and other non-commercial organizations may include it on PD library disks for which a modest fee is charged.
  920. --------------------------------
  921. Try it out.  If you like SuperDuper Gradebook enough to use it,
  922. send $16.25 to its industrious and dedicated author.
  923. Bangs L. Tapscott
  924. 4608 Lanark Rd.
  925. Salt Lake City, Utah 84124
  926.  
  927.  
  928. -- part contents for card part 31
  929. ----- text -----
  930.  
  931. ‚ÄúShareware‚Äù isn‚Äôt a type of software, it‚Äôs a distribution method.  Instead of going through the rigmarole of publishing, packaging, marketing, etc. with various middlemen, shareware is passed directly from person to person.
  932.   
  933. You copy it from someone who already has it, and try it out.  If you like it enough to use it, you send money directly to the author of the program.  If you don‚Äôt like it enough to pay for it, you don‚Äôt use it.
  934.  
  935. Everyone benefits from shareware.  There‚Äôs no pig-in-a-poke, no ‚Äúshrinkwrap‚Äù agreements requiring you to pay first and regret later.  You see what you‚Äôre getting before you pay.  Because there are no middlemen, and no expensive packaging, prices are extremely reasonable.  And because there‚Äôs no need to deal with publishing houses, individual programmers can market their products directly to the using public.  The concept of shareware owes it existence to the basic honesty of people.  Most users of shareware pay for it; those who don‚Äôt are aware they are doing something morally wrong.
  936.  
  937. Shareware is not public domain software.  And paying a fee to an info service such as CompuServe or GEnie in order to download a program is NOT the same as paying the shareware fee.  You wouldn‚Äôt stiff the waiter or waitress who has given you good service at the restaurant where you have dinner.  Don‚Äôt stiff the shareware programmer who provides you with good, inexpensive software.